home *** CD-ROM | disk | FTP | other *** search
/ Visual Basic Source Code / Visual Basic Source Code.iso / vbsource / painte1a / frmmain.frm < prev    next >
Text File  |  1999-09-10  |  28KB  |  851 lines
  1. VERSION 5.00
  2. Object = "{F9043C88-F6F2-101A-A3C9-08002B2F49FB}#1.2#0"; "COMDLG32.OCX"
  3. Object = "{831FDD16-0C5C-11D2-A9FC-0000F8754DA1}#2.0#0"; "MSCOMCTL.OCX"
  4. Begin VB.MDIForm frmMain 
  5.    AutoShowChildren=   0   'False
  6.    BackColor       =   &H8000000C&
  7.    ClientHeight    =   7560
  8.    ClientLeft      =   255
  9.    ClientTop       =   825
  10.    ClientWidth     =   8730
  11.    OLEDropMode     =   1  'Manual
  12.    StartUpPosition =   2  'CenterScreen
  13.    WindowState     =   2  'Maximized
  14.    Begin MSComctlLib.ImageList ImageList3 
  15.       Left            =   6585
  16.       Top             =   4275
  17.       _ExtentX        =   1005
  18.       _ExtentY        =   1005
  19.       BackColor       =   -2147483643
  20.       ImageWidth      =   74
  21.       ImageHeight     =   144
  22.       MaskColor       =   12632256
  23.       _Version        =   393216
  24.       BeginProperty Images {2C247F25-8591-11D1-B16A-00C0F0283628} 
  25.          NumListImages   =   1
  26.          BeginProperty ListImage1 {2C247F27-8591-11D1-B16A-00C0F0283628} 
  27.             Picture         =   "frmMain.frx":0000
  28.             Key             =   "colortable"
  29.          EndProperty
  30.       EndProperty
  31.    End
  32.    Begin MSComctlLib.ImageList ImageList2 
  33.       Left            =   9930
  34.       Top             =   4305
  35.       _ExtentX        =   1005
  36.       _ExtentY        =   1005
  37.       BackColor       =   -2147483643
  38.       MaskColor       =   12632256
  39.       _Version        =   393216
  40.    End
  41.    Begin MSComctlLib.ImageList ImageList1 
  42.       Left            =   705
  43.       Top             =   4425
  44.       _ExtentX        =   1005
  45.       _ExtentY        =   1005
  46.       BackColor       =   -2147483643
  47.       ImageWidth      =   18
  48.       ImageHeight     =   18
  49.       MaskColor       =   12632256
  50.       _Version        =   393216
  51.       BeginProperty Images {2C247F25-8591-11D1-B16A-00C0F0283628} 
  52.          NumListImages   =   8
  53.          BeginProperty ListImage1 {2C247F27-8591-11D1-B16A-00C0F0283628} 
  54.             Picture         =   "frmMain.frx":7E54
  55.             Key             =   "paint"
  56.          EndProperty
  57.          BeginProperty ListImage2 {2C247F27-8591-11D1-B16A-00C0F0283628} 
  58.             Picture         =   "frmMain.frx":8298
  59.             Key             =   "line"
  60.          EndProperty
  61.          BeginProperty ListImage3 {2C247F27-8591-11D1-B16A-00C0F0283628} 
  62.             Picture         =   "frmMain.frx":86DC
  63.             Key             =   "square"
  64.          EndProperty
  65.          BeginProperty ListImage4 {2C247F27-8591-11D1-B16A-00C0F0283628} 
  66.             Picture         =   "frmMain.frx":8B20
  67.             Key             =   "rectangle"
  68.          EndProperty
  69.          BeginProperty ListImage5 {2C247F27-8591-11D1-B16A-00C0F0283628} 
  70.             Picture         =   "frmMain.frx":8F64
  71.             Key             =   "circle"
  72.          EndProperty
  73.          BeginProperty ListImage6 {2C247F27-8591-11D1-B16A-00C0F0283628} 
  74.             Picture         =   "frmMain.frx":93A8
  75.             Key             =   "ellipse"
  76.          EndProperty
  77.          BeginProperty ListImage7 {2C247F27-8591-11D1-B16A-00C0F0283628} 
  78.             Picture         =   "frmMain.frx":97EC
  79.             Key             =   "dropper"
  80.          EndProperty
  81.          BeginProperty ListImage8 {2C247F27-8591-11D1-B16A-00C0F0283628} 
  82.             Picture         =   "frmMain.frx":9C30
  83.             Key             =   "eraser"
  84.          EndProperty
  85.       EndProperty
  86.    End
  87.    Begin MSComctlLib.Toolbar Toolbar2 
  88.       Align           =   4  'Align Right
  89.       Height          =   6870
  90.       Left            =   7485
  91.       TabIndex        =   3
  92.       Top             =   420
  93.       Width           =   1245
  94.       _ExtentX        =   2196
  95.       _ExtentY        =   12118
  96.       ButtonWidth     =   2143
  97.       ButtonHeight    =   3969
  98.       Appearance      =   1
  99.       Style           =   1
  100.       ImageList       =   "ImageList3"
  101.       _Version        =   393216
  102.       BorderStyle     =   1
  103.       MouseIcon       =   "frmMain.frx":A074
  104.       Begin VB.PictureBox Picture1 
  105.          AutoRedraw      =   -1  'True
  106.          AutoSize        =   -1  'True
  107.          Height          =   2220
  108.          Left            =   30
  109.          MouseIcon       =   "frmMain.frx":A1D6
  110.          MousePointer    =   99  'Custom
  111.          Picture         =   "frmMain.frx":A328
  112.          ScaleHeight     =   2160
  113.          ScaleWidth      =   1110
  114.          TabIndex        =   5
  115.          Top             =   45
  116.          Width           =   1170
  117.       End
  118.       Begin VB.HScrollBar HScroll1 
  119.          Height          =   210
  120.          Left            =   75
  121.          TabIndex        =   4
  122.          Top             =   3570
  123.          Width           =   1095
  124.       End
  125.       Begin VB.Label Label3 
  126.          AutoSize        =   -1  'True
  127.          Caption         =   "Color In Use"
  128.          Height          =   195
  129.          Left            =   165
  130.          TabIndex        =   8
  131.          Top             =   2355
  132.          Width           =   870
  133.       End
  134.       Begin VB.Shape Shape1 
  135.          BackStyle       =   1  'Opaque
  136.          FillStyle       =   0  'Solid
  137.          Height          =   210
  138.          Left            =   135
  139.          Top             =   2550
  140.          Width           =   915
  141.       End
  142.       Begin VB.Label lblPenSize 
  143.          Caption         =   "1"
  144.          Height          =   150
  145.          Left            =   810
  146.          TabIndex        =   7
  147.          Top             =   3240
  148.          Width           =   135
  149.       End
  150.       Begin VB.Label Label1 
  151.          Caption         =   "Pen Size"
  152.          Height          =   210
  153.          Left            =   60
  154.          TabIndex        =   6
  155.          Top             =   3285
  156.          Width           =   795
  157.       End
  158.    End
  159.    Begin MSComctlLib.Toolbar Toolbar1 
  160.       Align           =   3  'Align Left
  161.       Height          =   6870
  162.       Left            =   0
  163.       TabIndex        =   2
  164.       Top             =   420
  165.       Width           =   435
  166.       _ExtentX        =   767
  167.       _ExtentY        =   12118
  168.       ButtonWidth     =   661
  169.       ButtonHeight    =   635
  170.       Appearance      =   1
  171.       Style           =   1
  172.       ImageList       =   "ImageList1"
  173.       _Version        =   393216
  174.       BeginProperty Buttons {66833FE8-8583-11D1-B16A-00C0F0283628} 
  175.          NumButtons      =   8
  176.          BeginProperty Button1 {66833FEA-8583-11D1-B16A-00C0F0283628} 
  177.             Key             =   "paint"
  178.             Object.ToolTipText     =   "Paintbrush Tool"
  179.             ImageIndex      =   1
  180.             Style           =   2
  181.          EndProperty
  182.          BeginProperty Button2 {66833FEA-8583-11D1-B16A-00C0F0283628} 
  183.             Key             =   "line"
  184.             Object.ToolTipText     =   "Line Tool"
  185.             ImageIndex      =   2
  186.             Style           =   2
  187.          EndProperty
  188.          BeginProperty Button3 {66833FEA-8583-11D1-B16A-00C0F0283628} 
  189.             Key             =   "square"
  190.             Object.ToolTipText     =   "Square Tool"
  191.             ImageIndex      =   3
  192.             Style           =   2
  193.          EndProperty
  194.          BeginProperty Button4 {66833FEA-8583-11D1-B16A-00C0F0283628} 
  195.             Key             =   "rectangle"
  196.             Object.ToolTipText     =   "Rectangle Tool"
  197.             ImageIndex      =   4
  198.             Style           =   2
  199.          EndProperty
  200.          BeginProperty Button5 {66833FEA-8583-11D1-B16A-00C0F0283628} 
  201.             Key             =   "circle"
  202.             Object.ToolTipText     =   "Circle Tool"
  203.             ImageIndex      =   5
  204.             Style           =   2
  205.          EndProperty
  206.          BeginProperty Button6 {66833FEA-8583-11D1-B16A-00C0F0283628} 
  207.             Key             =   "ellipse"
  208.             Object.ToolTipText     =   "Ellipse Tool"
  209.             ImageIndex      =   6
  210.             Style           =   2
  211.          EndProperty
  212.          BeginProperty Button7 {66833FEA-8583-11D1-B16A-00C0F0283628} 
  213.             Key             =   "dropper"
  214.             Object.ToolTipText     =   "Dropper Tool"
  215.             ImageIndex      =   7
  216.             Style           =   2